﻿Imports System
Imports System.Runtime.Serialization
Imports System.Security.Permissions

Namespace System.Workflow.Activities
    <Serializable> _
    Public Class WorkflowAuthorizationException
        Inherits SystemException
        ' Methods
        Public Sub New()
        End Sub

        Public Sub New(ByVal message As String)
            MyBase.New(message)
        End Sub

        <SecurityPermission(SecurityAction.Demand, SerializationFormatter:=True)> _
        Protected Sub New(ByVal info As SerializationInfo, ByVal context As StreamingContext)
            MyBase.New(info, context)
        End Sub

        Public Sub New(ByVal message As String, ByVal innerException As Exception)
            MyBase.New(message, innerException)
        End Sub

        Public Sub New(ByVal activityName As String, ByVal principalName As String)
            MyBase.New(SR.GetString("WorkflowAuthorizationException", New Object() { activityName, principalName }))
        End Sub

    End Class
End Namespace

